-- card: 2086 from stack: in
-- bmap block id: 0
-- flags: 0000
-- background id: 3203
-- name: 


-- part 1 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=149 top=167 right=228 bottom=435
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Install FileName & NewFileName
----- HyperTalk script -----
on mouseUp
  put FileName( "STAK" ) into theTarget
  if theTarget is empty then
    beep 1
    answer "Installation cancelled." with "Ok"
  else
    set cursor to 4 -- the watch
    get second word of the long name of stack
    put it into theSource
    ResCopy value of theSource, theTarget, "XFCN", "FileName"
    if "OK" is in the result then
      ResCopy value of theSource, theTarget, "XFCN", "NewFileName"
      if "OK" is in the result then answer "Installation complete." with "Ok"
      else error "NewFileName"
    else error "FileName"
  end if
end mouseUp

on error what
  beep
  answer "Unable to install " & what & "."  with "Cancel"
end error



-- part 2 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=146 top=92 right=160 bottom=432
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 14
-- style flags: 8192
-- line height: 18
-- part name: 


-- part contents for background part 6
----- text -----
8 of 8

-- part contents for card part 2
----- text -----
To install FileName and NewFileName
click the button bellow and select a destination stack.